program ex(input, output);

var x, y : integer;

begin
  x:=1;
  repeat
    x:= x+1;
    y:= x;
    while (x<10) do 
	begin
		y:=y+2
	end;
  until (x<10);
end.

